home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / FROMUTS / UNIXLIB37B / src / c / div < prev    next >
Text File  |  1990-09-27  |  712b  |  44 lines

  1. #ifdef __STDC__
  2. static char sccs_id[] = "@(#) div.c 1.1 "__DATE__" HJR";
  3. #else
  4. static char sccs_id[] = "@(#) div.c 1.1 26/9/90 HJR";
  5. #endif
  6.  
  7. /* div.c (c) Copyright 1990 H.Rogers */
  8.  
  9. #include <stdlib.h>
  10.  
  11. #ifdef __STDC__
  12. div_t div(register int numer,register int denom)
  13. #else
  14. div_t div(numer,denom)
  15. register int numer;
  16. register int denom;
  17. #endif
  18. {
  19. register div_t r;
  20. register int i;
  21.  
  22. r.quot = i = numer / denom;
  23. r.rem = numer - (i * denom);
  24.  
  25. return(r);
  26. }
  27.  
  28. #ifdef __STDC__
  29. ldiv_t ldiv(register long numer,register long denom)
  30. #else
  31. ldiv_t ldiv(numer,denom)
  32. register long numer;
  33. register long denom;
  34. #endif
  35. {
  36. register ldiv_t r;
  37. register long i;
  38.  
  39. r.quot = i = numer / denom;
  40. r.rem = numer - (i * denom);
  41.  
  42. return(r);
  43. }
  44.